#include <iostream>
#include <unistd.h>
#include <string>
#include <cstring>
#include <error.h>
#include <cstdio>
#include <strings.h>
#include <unordered_map>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include "log.hpp"

#define SIZE 1024

class UdpServer
{
public:
    UdpServer(uint16_t port, std::string ip = "") : _port(port), _ip(ip), _sock(-1)
    {
    }

    bool initServer()
    {
        // 创建套接字
        _sock = socket(AF_INET, SOCK_DGRAM, 0);
        if (_sock < 0)
        {
            logMessage(FATAL, "%d:%s", errno, strerror(errno));
            exit(2);
        }
        // 2. bind: 将用户设置的ip和port在内核中和我们当前的进程强关联
        // "192.168.110.132" -> 点分十进制字符串风格的IP地址
        // 每一个区域取值范围是[0-255]: 1字节 -> 4个区域
        // 理论上，表示一个IP地址，其实4字节就够了！！
        // 点分十进制字符串风格的IP地址 <-> 4字节
        struct sockaddr_in local;
        bzero(&local, sizeof(local));                                              // 初始化
        local.sin_addr.s_addr = _ip.empty() ? INADDR_ANY : inet_addr(_ip.c_str()); // IP地址 <-> 4字节
        // 服务器的IP和端口未来也是要发送给对方主机的 -> 先要将数据发送到网络！
        local.sin_port = htons(_port);
        local.sin_family = AF_INET;
        if (bind(_sock, (sockaddr *)&local, sizeof(local)) < 0)
        {
            logMessage(FATAL, "%d:%s", errno, strerror(errno));
            exit(3);
        }

        logMessage(NORMAL, "init udp server done ... %s", strerror(errno));
        return true;
    }

    void Start()
    {
        char buffer[SIZE];
        char key[64];
        for (;;)
        {
            struct sockaddr_in peer;
            bzero(&peer, sizeof(peer));
            socklen_t len = sizeof(peer);

            ssize_t s = recvfrom(_sock, buffer, sizeof(buffer) - 1, 0, (sockaddr *)&peer, &len);
            if (s > 0)
            {
                buffer[s] = 0;

                uint16_t cli_port = ntohs(peer.sin_port);      // 从网络中来的！ 网络转主机
                std::string cli_ip = inet_ntoa(peer.sin_addr); // 4字节的网络序列的IP->本主机的字符串风格的IP，方便显示
                // printf("[%s:%d]# %s\n", cli_ip.c_str(), cli_port, buffer);

                snprintf(key, sizeof(key), "%s-%u", cli_ip.c_str(), cli_port);
                auto it = _users.find(key);
                if (it == _users.cend())
                {
                    logMessage(NORMAL, "add new user : %s", key);
                    _users.insert({key, peer});
                }
            }
            // 分析和处理数据，TODO
            // end. 写回数据
            for (auto &iter : _users)
            {
                std::string serverMessage=key;
                serverMessage += "# ";
                serverMessage += buffer;
                logMessage(NORMAL, "push message to %s", iter.first.c_str());
                sendto(_sock, serverMessage.c_str(), serverMessage.size(), 0, (sockaddr *)&peer, sizeof(peer));
            }
            // sendto(_sock, buffer, strlen(buffer), 0, (sockaddr *)&peer, sizeof(peer));
        }
    }

    ~UdpServer()
    {
        if (_sock >= 0)
        {
            close(_sock);
        }
    }

private:
    std::string _ip;
    uint16_t _port;
    int _sock;
    std::unordered_map<std::string, struct sockaddr_in> _users;
};
